home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / NEUCLS3.ZIP / NURN.ZP / MLP.BAT < prev    next >
Encoding:
DOS Batch File  |  1994-08-06  |  4.3 KB  |  224 lines
  1. :TOP
  2. c:\neuron\batch\Ben menuF c:\neuron\batch\MLP.mnu
  3.  
  4. IF ERRORLEVEL 9  GOTO END
  5. IF ERRORLEVEL 8  GOTO help
  6. IF ERRORLEVEL 7  GOTO UTIL
  7. IF ERRORLEVEL 6  GOTO wate
  8. IF ERRORLEVEL 5  GOTO jinn
  9. IF ERRORLEVEL 4  GOTO Procs
  10. IF ERRORLEVEL 3  GOTO TMAP
  11. IF ERRORLEVEL 2  GOTO INT6   
  12. IF ERRORLEVEL 1  GOTO NENERP   
  13. IF ERRORLEVEL 0  GOTO END 
  14.  
  15.  
  16. :NENERP
  17.  
  18. c:\neuron\batch\Ben menuF c:\neuron\batch\ner.mnu
  19.  
  20. IF ERRORLEVEL 5  GOTO TOP
  21. IF ERRORLEVEL 4  GOTO nerhlp
  22. IF ERRORLEVEL 3  GOTO nert
  23. IF ERRORLEVEL 2  GOTO ner2   
  24. IF ERRORLEVEL 1  GOTO ner1   
  25. IF ERRORLEVEL 0  GOTO END 
  26.  
  27. :ner1
  28. c:\neuron\batch\Ben cls blue
  29. IF NOT EXIST Nenr1.par  copy c:\neuron\batch\Nenr1.par
  30. Edit Nenr1.par
  31. c:\neuron\Nenerp<Nenr1.par 
  32. pause
  33. c:\neuron\batch\Ben cls blue
  34. GOTO Nenerp
  35.  
  36. :ner2
  37. c:\neuron\batch\Ben cls blue
  38. c:\neuron\Nenerp
  39. pause
  40. c:\neuron\batch\Ben cls blue
  41. GOTO Nenerp
  42.  
  43. :nert
  44. If Not EXIST Nerp.out GOTO Nenerp
  45. c:\neuron\batch\Ben list  Nerp.out Nerp.out
  46. GOTO Nenerp
  47.  
  48.  
  49. :nerhlp
  50. c:\neuron\batch\Ben list  c:\neuron\batch\ner.hlp Backpropagation~Help
  51. GOTO NENERP
  52.  
  53.  
  54. GOTO TOP
  55.  
  56.  
  57. :INT6
  58.  
  59. c:\neuron\batch\Ben menuF c:\neuron\batch\int.mnu
  60. IF ERRORLEVEL 5  GOTO TOP
  61. IF ERRORLEVEL 4  GOTO inthlp
  62. IF ERRORLEVEL 3  GOTO int3   
  63. IF ERRORLEVEL 2  GOTO int2   
  64. IF ERRORLEVEL 1  GOTO int1   
  65. IF ERRORLEVEL 0  GOTO END 
  66.  
  67. :INT1
  68.  
  69. c:\neuron\batch\Ben cls blue
  70. IF NOT EXIST INT61.par  copy c:\neuron\batch\INT61.par
  71. Edit INT61.par
  72. c:\neuron\INT6<INT61.par
  73. pause
  74. c:\neuron\batch\Ben cls blue
  75. GOTO INT6
  76.  
  77. :INT2
  78.  
  79. Ben cls blue
  80. c:\neuron\INT6
  81. pause
  82. c:\neuron\batch\Ben cls blue
  83. GOTO INT6
  84.  
  85. :int3
  86. If Not EXIST Int6.out GOTO Int6
  87. c:\neuron\batch\Ben list int6.out Int6.out
  88. GOTO Int6
  89.  
  90. :inthlp
  91. c:\neuron\batch\Ben list c:\neuron\batch\int.hlp  Fast~Training~Help
  92. GOTO INT6
  93.  
  94.  
  95.  
  96. :TMAP
  97.  
  98. c:\neuron\batch\Ben menuF c:\neuron\batch\map.mnu
  99. IF ERRORLEVEL 5  GOTO TOP
  100. IF ERRORLEVEL 4  GOTO tmaphlp
  101. IF ERRORLEVEL 3  GOTO tmap3   
  102. IF ERRORLEVEL 2  GOTO tmap2   
  103. IF ERRORLEVEL 1  GOTO tmap1   
  104. IF ERRORLEVEL 0  GOTO END 
  105.  
  106. :Tmap1
  107.  
  108. c:\neuron\batch\Ben cls blue
  109. IF NOT EXIST Tmap21.par  copy c:\neuron\batch\Tmap21.par
  110. Edit Tmap21.par
  111. c:\neuron\Tmap2<Tmap21.par
  112. pause
  113. c:\neuron\batch\Ben cls blue
  114. GOTO TMAP
  115.  
  116. :tmap2
  117. c:\neuron\batch\Ben cls blue
  118. c:\neuron\Tmap2
  119. pause
  120. c:\neuron\batch\Ben cls blue
  121. GOTO TMAP
  122.  
  123. :tmap3
  124. If Not EXIST tmap2.out GOTO Tmap
  125. c:\neuron\batch\Ben list tmap2.out Tmap~Output
  126. GOTO tmap
  127.  
  128. :tmaphlp
  129. c:\neuron\batch\Ben list c:\neuron\batch\tmap.hlp MLP~Analysis~Help
  130. GOTO TMAP
  131.  
  132.  
  133. :Procs
  134.  
  135. c:\neuron\batch\Ben menuF c:\neuron\batch\prc.mnu
  136. IF ERRORLEVEL 5  GOTO TOP
  137. IF ERRORLEVEL 4  GOTO prochlp
  138. IF ERRORLEVEL 3  GOTO proc3   
  139. IF ERRORLEVEL 2  GOTO proc2   
  140. IF ERRORLEVEL 1  GOTO proc1   
  141. IF ERRORLEVEL 0  GOTO END 
  142.  
  143. :Proc1
  144.  
  145. c:\neuron\batch\Ben cls blue
  146. IF NOT EXIST Proc1.par  copy c:\neuron\batch\Proc1.par
  147. Edit Proc1.par
  148. c:\neuron\Procs<Proc1.par
  149. pause
  150. c:\neuron\batch\Ben cls blue
  151. GOTO Procs
  152.  
  153. :Proc2
  154. c:\neuron\batch\Ben cls blue
  155. c:\neuron\Procs
  156. pause
  157. c:\neuron\batch\Ben cls blue
  158. GOTO Procs
  159.  
  160. :Proc3
  161. If Not EXIST Proc.out GOTO Procs
  162. c:\neuron\batch\Ben list Proc.out Processing~Record
  163. GOTO Procs
  164.  
  165. :Prochlp
  166. c:\neuron\batch\Ben list c:\neuron\batch\Proc.hlp MLP~Processing~Help
  167. GOTO Procs
  168.  
  169.  
  170.  
  171. :Jinn
  172. c:\neuron\batch\Ben menuF c:\neuron\batch\jinn.mnu
  173. IF ERRORLEVEL 3  GOTO TOP
  174. IF ERRORLEVEL 2  GOTO jinhlp   
  175. IF ERRORLEVEL 1  GOTO jin1   
  176. IF ERRORLEVEL 0  GOTO END 
  177.  
  178. :jin1
  179. c:\neuron\batch\Ben cls blue
  180. c:\neuron\Jinn
  181. c:\neuron\batch\Ben cls blue
  182. GOTO Jinn
  183.  
  184. :jinhlp
  185. c:\neuron\batch\Ben list c:\neuron\batch\jin.hlp Code~Generation~Help
  186. GOTO Jinn
  187.  
  188.  
  189. :Wate
  190. c:\neuron\batch\Ben menuF c:\neuron\batch\wate.mnu
  191. IF ERRORLEVEL 4  GOTO TOP
  192. IF ERRORLEVEL 3  GOTO watehlp   
  193. IF ERRORLEVEL 2  GOTO wate2   
  194. IF ERRORLEVEL 1  GOTO wate1   
  195. IF ERRORLEVEL 0  GOTO END 
  196.  
  197. :wate1
  198. c:\neuron\batch\Ben cls blue
  199. c:\neuron\Watecon
  200. c:\neuron\batch\Ben cls blue
  201. GOTO wate
  202.  
  203. :wate2
  204. If Not EXIST wate.out GOTO wate
  205. c:\neuron\batch\Ben list wate.out Watecon~Output
  206. GOTO wate
  207.  
  208. :watehlp
  209. c:\neuron\batch\Ben list c:\neuron\batch\wate.hlp Weight~Conversion~Help
  210. GOTO wate
  211.  
  212. :Help
  213. c:\neuron\batch\Ben list c:\neuron\batch\MLPc.hlp MLP~Help
  214. GOTO TOP
  215.  
  216. :Util
  217. call c:\neuron\batch\Deldir
  218. GOTO Top
  219.  
  220.  
  221.  
  222. :END
  223.  
  224.